#ifndef MONO_COMMON_BUFFER_H_
#define MONO_COMMON_BUFFER_H_
#include <cstring>
#include <cstddef>
#include <cstdint>
#include <string>
#include <cassert>

namespace mono {

	/*!
	* A buffer class that allocates a buffer of a given type and size 
	* in the constructor and deallocates the buffer in the destructor.
	*
	* This class is useful everywhere where a temporary buffer
	* is needed.
   */
template <class T>
class Buffer {
public:
	/*!
	* Creates and allocates the Buffer.
	*/
	Buffer(std::size_t scapacity):
		_capacity(scapacity),
		_used(scapacity),
		_ptr(0),
		_ownMem(true)	
	{
		if (scapacity > 0)
		{
			_ptr = new T[scapacity];
		}
	}

	/*!
	* Creates the Buffer. Length argument specifies the length
	* of the supplied memory pointed to by pMem in the number
	* of elements of type T. Supplied pointer is considered
	* blank and not owned by Buffer, so in this case Buffer 
	* only acts as a wrapper around externally supplied 
	* (and lifetime-managed) memory.
	*/
	Buffer(T* pMem, std::size_t length):
		_capacity(length),
		_used(length),
		_ptr(pMem),
		_ownMem(false)

	{
	}
		
	/*!
	* Creates and allocates the Buffer; copies the contents of
	* the supplied memory into the buffer. Length argument specifies
	* the length of the supplied memory pointed to by pMem in the
	* number of elements of type T.
	*/
	Buffer(const T* pMem, std::size_t length):
		_capacity(length),
		_used(length),
		_ptr(0),
		_ownMem(true)
	{
		if (_capacity > 0)
		{
			_ptr = new T[_capacity];
			std::memcpy(_ptr, pMem, _used * sizeof(T));
		}
	}
	
	/*!
	* Copy constructor.
	*/
	Buffer(const Buffer& other):	
		_capacity(other._used),
		_used(other._used),
		_ptr(0),
		_ownMem(true)
	{
		if (_used)
		{
			_ptr = new T[_used];
			std::memcpy(_ptr, other._ptr, _used * sizeof(T));
		}
	}

	/*!
	*  Assignment operator.
	*/
	Buffer& operator = (const Buffer& other)	
	{
		if (this != &other)
		{
			Buffer tmp(other);
			swap(tmp);
		}

		return *this;
	}

	/*!
	*  Destroys the Buffer.
	*/
	~Buffer()
		
	{
		if (_ownMem) delete [] _ptr;
	}
		
	/*!
	* Resizes the buffer capacity and size. If preserveContent is true,
	* the content of the old buffer is copied over to the
	* new buffer. The new capacity can be larger or smaller than
	* the current one; if it is smaller, capacity will remain intact.
	* Size will always be set to the new capacity.
	*  
	* Buffers only wrapping externally owned storage can not be 
	* resized. If resize is attempted on those, IllegalAccessException
	* is thrown.
	*/
	bool resize(std::size_t newCapacity, bool preserveContent = true)
	{
		if (!_ownMem) return false;

		if (newCapacity > _capacity)
		{
			T* ptr = new T[newCapacity];
			if (preserveContent)
			{
				std::memcpy(ptr, _ptr, _used * sizeof(T));
			}
			delete [] _ptr;
			_ptr = ptr;
			_capacity = newCapacity;
		}
		
		_used = newCapacity;
		return true;
	}

	/*!
	* Sets the buffer capacity. If preserveContent is true,
	* the content of the old buffer is copied over to the
	* new buffer. The new capacity can be larger or smaller than
	* the current one; size will be set to the new capacity only if 
	* new capacity is smaller than the current size, otherwise it will
	* remain intact.
	* 
	* Buffers only wrapping externally owned storage can not be 
	* resized. If resize is attempted on those, IllegalAccessException
	* is thrown.
	*/
	bool setCapacity(std::size_t newCapacity, bool preserveContent = true)
	{
		if (!_ownMem) 
			return false;

		if (newCapacity != _capacity) {
			T* ptr = 0;
			if (newCapacity > 0)
			{
				ptr = new T[newCapacity];
				if (preserveContent)
				{
					std::size_t newSz = _used < newCapacity ? _used : newCapacity;
					std::memcpy(ptr, _ptr, newSz * sizeof(T));
				}
			}
			delete [] _ptr;
			_ptr = ptr;
			_capacity = newCapacity;

			if (newCapacity < _used) _used = newCapacity;
		}
		return true;
	}

	/*!
	* Assigns the argument buffer to this buffer.
	* If necessary, resizes the buffer.
	*/
	void assign(const T* buf, std::size_t sz)
	{
		if (0 == sz) return;
		if (sz > _capacity) resize(sz, false);
		std::memcpy(_ptr, buf, sz * sizeof(T));
		_used = sz;
	}

	/*!
	*  Resizes this buffer and appends the argument buffer.
	*/
	void append(const T* buf, std::size_t sz)	
	{
		if (0 == sz) return;
		resize(_used + sz, true);
		std::memcpy(_ptr + _used - sz, buf, sz * sizeof(T));
	}

	/*!
	* Resizes this buffer by one element and appends the argument value.
	*/
	void append(T val)	
	{
		resize(_used + 1, true);
		_ptr[_used - 1] = val;
	}

	/*!
	* Resizes this buffer and appends the argument buffer.
	*/
	void append(const Buffer& buf)	
	{
		append(buf.begin(), buf.size());
	}

	/*!
	* Returns the allocated memory size in elements.
	*/
	std::size_t capacity() const	
	{
		return _capacity;
	}

	/*!
	* @returns the allocated memory size in bytes.
	*/
	std::size_t capacityBytes() const
		
	{
		return _capacity * sizeof(T);
	}

	/*!
	*  Swaps the buffer with another one.
	*/
	void swap(Buffer& other)
	
	{
		using std::swap;

		swap(_ptr, other._ptr);
		swap(_capacity, other._capacity);
		swap(_used, other._used);
	}

	/*!
	*  Compare operator.
	*/
	bool operator == (const Buffer& other) const	
	{
		if (this != &other)
		{
			if (_used == other._used)
			{
				if (std::memcmp(_ptr, other._ptr, _used * sizeof(T)) == 0)
				{
					return true;
				}
			}
			return false;
		}

		return true;
	}

	/*!
	*  Compare operator.
	*/
	bool operator != (const Buffer& other) const	
	{
		return !(*this == other);
	}

	/*!
	*Sets the contents of the buffer to zero.
	*/
	void clear()	
	{
		std::memset(_ptr, 0, _used * sizeof(T));
	}

	/*!
	* @return the used size of the buffer in elements.
	*/
	std::size_t size() const	
	{
		return _used;
	}

	/*!
	* @return the used size of the buffer in bytes.
	*/
	std::size_t sizeBytes() const
		
	{
		return _used * sizeof(T);
	}

	/*!
	* @return a pointer to the beginning of the buffer.
	*/
	T* begin()
	{
		return _ptr;
	}
	
	/*!
	* @return a pointer to the beginning of the buffer.
	*/
	const T* begin() const
		
	{
		return _ptr;
	}

	/*!
	* @return a pointer to end of the buffer.
	*/
	T* end()
	{
		return _ptr + _used;
	}
	
	/*!
	* @return a pointer to the end of the buffer.
	*/
	const T* end() const	
	{
		return _ptr + _used;
	}

	/*!
	* @return true if buffer is empty.
	*/	
	bool empty() const		
	{
		return 0 == _used;
	}

	T& operator [] (std::size_t index)
	{
		assert (index < _used);
		
		return _ptr[index];
	}

	const T& operator [] (std::size_t index) const
	{
		assert (index < _used);
		
		return _ptr[index];
	}

private:
	Buffer();

	std::size_t _capacity;
	std::size_t _used;
	T*          _ptr;
	bool        _ownMem;
};


} 


#endif
